home *** CD-ROM | disk | FTP | other *** search
/ Aminet 30 / Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso / Aminet / dev / mui / bcc_src.lha / Parser / main.cpp < prev    next >
C/C++ Source or Header  |  1998-03-15  |  962b  |  53 lines
  1. #include <stdio.h>
  2. #include <stdlib.h>
  3. #include <string.h>
  4.  
  5. #include "ParseBH.h"
  6. #include "ParseBC.h"
  7. #include "CreateInitCl.h"
  8. #include "ParseDir.h"
  9. #include "Global.h"
  10. #include "ParseOptions.h"
  11.  
  12. ParseBC pbc;
  13. ParseBH pbh;
  14.  
  15. unsigned char ver[] = "$VER: BCC 3.5 (15.3.98)";
  16.  
  17. int main( int argv, char **arg )
  18. {
  19.  unsigned char *a;
  20.  
  21.     a = ver;
  22.  
  23.     if( argv == 2 ) {
  24.  
  25.         ParseOptions *po = new ParseOptions;
  26.         po->Start();
  27.         delete po;
  28.  
  29.         if( !Prefs.noversion ) printf( "BCC precompiler v3.5\n\n" );
  30.  
  31.         if( !stricmp( arg[1], "initcl" ) ) {
  32.             ParseDir pd( "#?.bh" );
  33.             char *name;
  34.             while( name = pd.Next() ) {
  35.                 if( pbh.Open( name, 0 ) ) {
  36.                     short res1 = pbh.Start();
  37.                     pbh.Close();
  38.                     if( !res1 ) return 20;
  39.                 }
  40.             }
  41.             CreateInitCl cicl;
  42.             if( !cicl.Create() ) return 20;
  43.         } else 
  44.         if( pbc.Open( arg[1] ) ) {
  45.             short res = pbc.Start();
  46.             pbc.Close();
  47.             if( !res ) return 20;
  48.         }
  49.  
  50.     } else printf( "Usage: BCC <file>.bc\n       BCC initcl\n\n" );
  51.  
  52. }
  53.